home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / library / reqtlsdv.lha / ReqTools / Glue / SAS-C / LibSource.lha / src / rtGetLongA.asm < prev    next >
Assembly Source File  |  1993-08-25  |  217b  |  18 lines
  1.  
  2.     SECTION "text",CODE
  3.  
  4.     INCLUDE    "reqtools.i"
  5.  
  6.     XDEF    _rtGetLongA
  7.  
  8. _rtGetLongA:
  9.     movem.l    a2/a3/a6,-(a7)
  10.     GETRTBASE
  11.     movem.l    16(a7),a1/a2/a3
  12.     move.l    28(a7),a0
  13.     jsr    _LVOrtGetLongA(a6)
  14.     movem.l    (a7)+,a2/a3/a6
  15.     rts
  16.  
  17.    END
  18.